(MAKE-PACKAGE "Qi")
(LOAD "Qi9.2.txt")
(COMPILE-FILE "Qi9.2.txt")
(DEFUN load-qi-object-code ()
   #+CLISP (LOAD "Qi 9.2.fas")
   #+(OR ALLEGRO SBCL) (LOAD "Qi9.2.fasl")
   #+CMU   (LOAD "Qi 9.2.x86f"))
(load-qi-object-code)
(USE-PACKAGE "Qi")
(Qi::save)
(READ-CHAR)
(Qi::quit)

